home *** CD-ROM | disk | FTP | other *** search
/ Graphics Plus / Graphics Plus.iso / msdos / animutil / fastgfx / fg303d / exbas.arj / FGDOC / EXAMPLES / BASIC / 15-03.BAS < prev    next >
Encoding:
BASIC Source File  |  1993-09-30  |  380 b   |  17 lines
  1. REM $INCLUDE: 'fastgraf.bi'
  2.  
  3. DEFINT A-Z
  4.  
  5. PRINT "Mary Had a Little Lamb..."
  6. FGmusic "T150 L8 EDCDEEE P DDD P EGG P EDCDEEE L16 P L8 EDDEDC$"
  7. FGwaitfor 18
  8.  
  9. PRINT "up the scale in two octaves..."
  10. FGmusic "L16 CC#DD#EFF#GG#AA#B O+ CC#DD#EFF#GG#AA#B$"
  11. FGwaitfor 18
  12.  
  13. PRINT "Beethoven's Fifth Symphony..."
  14. FGmusic "T180 O2 L2 P L8 P GGG L2 D# L24 P L8 P FFF L2 D$"
  15.  
  16. END
  17.